#string functions in perl

$str1="REVATHI";
$str2="sumitra";
print("the number of removed new line characters: $chomp(str1));

print("the lower case of the srting 1: $lc(str1));

print("the upper case of the srting 2: $uc(str2));


